;; Terje Nordehaug ;; July 2009;; No copyright, warranties nor rights reseved.;; duplicate install-selection in RMCL and likely also MCL 5.2(in-package :inspector)(let ((*WARN-IF-REDEFINE-KERNEL* nil)      (*warn-if-redefine* nil))(defmethod view-click-event-handler ((view stack-inspector-view) where)  (declare (ignore where))  (call-next-method)  (unless (double-click-p)      (install-selection view))))